home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / hypercar / mactool / datatran.sit / Data Transfer Info. / background_2600.txt < prev    next >
Encoding:
Text File  |  1992-11-05  |  2.5 KB  |  117 lines
  1. -- background: 2600 from stack: in.
  2. -- bmap block id: 3083
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: foo
  6. ----- HyperTalk script -----
  7. on openCard
  8.   hide message box
  9.   show menuBar
  10.   pass openCard
  11. end openCard
  12.  
  13.  
  14.  
  15.  
  16. -- part 21 (field)
  17. -- low flags: 00
  18. -- high flags: 0000
  19. -- rect: left=0 top=6 right=54 bottom=512
  20. -- title width / last selected line: 0
  21. -- icon id / first selected line: 0 / 0
  22. -- text alignment: 1
  23. -- font id: 16
  24. -- text size: 18
  25. -- style flags: 0
  26. -- line height: 24
  27. -- part name: title
  28.  
  29.  
  30. -- part 22 (field)
  31. -- low flags: 00
  32. -- high flags: 0000
  33. -- rect: left=28 top=56 right=297 bottom=491
  34. -- title width / last selected line: 0
  35. -- icon id / first selected line: 0 / 0
  36. -- text alignment: 0
  37. -- font id: 16
  38. -- text size: 14
  39. -- style flags: 0
  40. -- line height: 17
  41. -- part name: points
  42. ----- HyperTalk script -----
  43. on mouseUp
  44.   get the clickLoc
  45.   put 1 + ( (clickV()-((top of me)+1)) div (textHeight of me) ) into k
  46.   -- ask k && line k of me
  47.   if line k of me is not empty then
  48.     -- get (textHeight of me * (k-1)) + ((top of me)+1)
  49.     -- set top of cd btn hiliter to it
  50.     --  set hilite of cd btn "hiliter" to true
  51.     --  show cd btn "hiliter"
  52.     get first word of line k of me
  53.     if  it = "ΓÇó" then
  54.       get second word of line k of me
  55.     end if
  56.     visual effect  dissolve
  57.     go to card it
  58.   end if
  59. end mouseUp
  60.  
  61.  
  62. -- part 23 (button)
  63. -- low flags: 00
  64. -- high flags: 3000
  65. -- rect: left=40 top=315 right=342 bottom=69
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 30557 / 30557
  68. -- text alignment: 1
  69. -- font id: 0
  70. -- text size: 12
  71. -- style flags: 0
  72. -- line height: 16
  73. -- part name: first card
  74. ----- HyperTalk script -----
  75. on mouseUp
  76.   go to card "Main Topics"
  77.  
  78. end mouseUp
  79.  
  80.  
  81. -- part 24 (button)
  82. -- low flags: 00
  83. -- high flags: 0000
  84. -- rect: left=245 top=316 right=341 bottom=277
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 1013 / 1013
  87. -- text alignment: 1
  88. -- font id: 0
  89. -- text size: 12
  90. -- style flags: 0
  91. -- line height: 16
  92. -- part name: 
  93. ----- HyperTalk script -----
  94. on mouseUp
  95.   visual effect wipe left slow
  96.   go to next card
  97. end mouseUp
  98.  
  99.  
  100. -- part 25 (button)
  101. -- low flags: 00
  102. -- high flags: 0000
  103. -- rect: left=213 top=316 right=341 bottom=245
  104. -- title width / last selected line: 0
  105. -- icon id / first selected line: 1014 / 1014
  106. -- text alignment: 1
  107. -- font id: 0
  108. -- text size: 12
  109. -- style flags: 0
  110. -- line height: 16
  111. -- part name: 
  112. ----- HyperTalk script -----
  113. on mouseUp
  114.   visual effect scroll right slow
  115.   go to prev card
  116. end mouseUp
  117.